home *** CD-ROM | disk | FTP | other *** search
Text File | 1999-02-23 | 23.4 KB | 1,052 lines |
- object ParamsForm: TParamsForm
- Left = 189
- Top = 116
- BorderStyle = bsDialog
- Caption = 'Setup.inf'
- ClientHeight = 372
- ClientWidth = 428
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- ShowHint = True
- PixelsPerInch = 96
- TextHeight = 13
- object PageControl: TPageControl
- Left = 0
- Top = 0
- Width = 428
- Height = 337
- ActivePage = TextInfo
- Align = alTop
- TabOrder = 0
- object MainWindow: TTabSheet
- Caption = 'General'
- object Label1: TLabel
- Left = 10
- Top = 178
- Width = 150
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Left-top text:'
- end
- object Label5: TLabel
- Left = 10
- Top = 16
- Width = 150
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Product Name:'
- end
- object Label6: TLabel
- Left = 10
- Top = 64
- Width = 150
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Version:'
- end
- object Label7: TLabel
- Left = 10
- Top = 88
- Width = 150
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Firm Name:'
- end
- object Label3: TLabel
- Left = 10
- Top = 116
- Width = 150
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Top Color:'
- end
- object Label4: TLabel
- Left = 10
- Top = 145
- Width = 150
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Bottom Color:'
- end
- object PaintBox: TPaintBox
- Left = 320
- Top = 112
- Width = 81
- Height = 53
- OnPaint = PaintBoxPaint
- end
- object Label12: TLabel
- Left = 104
- Top = 212
- Width = 54
- Height = 13
- Caption = 'Before Run'
- end
- object Label13: TLabel
- Left = 114
- Top = 240
- Width = 45
- Height = 13
- Caption = 'After Run'
- end
- object Label24: TLabel
- Left = 10
- Top = 40
- Width = 150
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Internal Name:'
- end
- object SetupText: TEdit
- Left = 180
- Top = 174
- Width = 221
- Height = 21
- TabOrder = 6
- Text = 'Product Setup'
- end
- object ProductName: TEdit
- Left = 180
- Top = 12
- Width = 221
- Height = 21
- TabOrder = 0
- Text = 'Product'
- end
- object ProductVersion: TEdit
- Left = 180
- Top = 60
- Width = 221
- Height = 21
- TabOrder = 2
- Text = 'alfa'
- end
- object FirmName: TEdit
- Left = 180
- Top = 84
- Width = 221
- Height = 21
- TabOrder = 3
- Text = 'Media Art'
- end
- object TopColor: TBitBtn
- Left = 180
- Top = 112
- Width = 133
- Height = 25
- Caption = 'TopColor'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 4
- OnClick = ColorBtnClick
- end
- object BottomColor: TBitBtn
- Left = 180
- Top = 140
- Width = 133
- Height = 25
- Caption = 'BottomColor'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 5
- OnClick = ColorBtnClick
- end
- object BeforeRun: TEdit
- Left = 180
- Top = 208
- Width = 221
- Height = 21
- TabOrder = 7
- end
- object AfterRun: TEdit
- Left = 180
- Top = 236
- Width = 220
- Height = 21
- TabOrder = 8
- end
- object InternalName: TEdit
- Left = 180
- Top = 36
- Width = 221
- Height = 21
- TabOrder = 1
- Text = 'Product'
- end
- object AutoUninstall: TCheckBox
- Left = 180
- Top = 264
- Width = 221
- Height = 17
- Caption = 'Auto Uninstall in '#39'Add/Remove program'#39
- TabOrder = 9
- end
- end
- object TextInfo: TTabSheet
- Caption = 'Texts'
- object Label18: TLabel
- Left = 72
- Top = 4
- Width = 87
- Height = 13
- Caption = 'Windows captions'
- end
- object Label2: TLabel
- Left = 4
- Top = 4
- Width = 36
- Height = 13
- Caption = 'Buttons'
- end
- object Label11: TLabel
- Left = 4
- Top = 244
- Width = 68
- Height = 13
- Caption = 'Uninstall string'
- end
- object Label17: TLabel
- Left = 256
- Top = 4
- Width = 27
- Height = 13
- Caption = 'Errors'
- end
- object Label19: TLabel
- Left = 168
- Top = 244
- Width = 78
- Height = 13
- Caption = 'Uninstall caption'
- end
- object NamePrev: TEdit
- Left = 4
- Top = 20
- Width = 53
- Height = 21
- TabOrder = 0
- Text = '< Back'
- end
- object NameNext: TEdit
- Left = 4
- Top = 44
- Width = 53
- Height = 21
- TabOrder = 1
- Text = 'Next >'
- end
- object NameCancel: TEdit
- Left = 4
- Top = 68
- Width = 53
- Height = 21
- TabOrder = 2
- Text = 'Cancel'
- end
- object NameYes: TEdit
- Left = 4
- Top = 92
- Width = 53
- Height = 21
- TabOrder = 3
- Text = 'Yes'
- end
- object NameNo: TEdit
- Left = 4
- Top = 116
- Width = 53
- Height = 21
- TabOrder = 4
- Text = 'No'
- end
- object NameBrowse: TEdit
- Left = 4
- Top = 140
- Width = 53
- Height = 21
- TabOrder = 5
- Text = 'Browse...'
- end
- object NameFinish: TEdit
- Left = 4
- Top = 164
- Width = 53
- Height = 21
- TabOrder = 6
- Text = 'Finish'
- end
- object LicenseCaption: TEdit
- Left = 72
- Top = 44
- Width = 170
- Height = 21
- TabOrder = 9
- Text = 'Software License Agreement'
- end
- object UserCaption: TEdit
- Left = 72
- Top = 68
- Width = 170
- Height = 21
- TabOrder = 10
- Text = 'User Information'
- end
- object DirectoryCaption: TEdit
- Left = 72
- Top = 92
- Width = 170
- Height = 21
- TabOrder = 11
- Text = 'Choose Destination Location'
- end
- object CopyingCaption: TEdit
- Left = 72
- Top = 140
- Width = 170
- Height = 21
- TabOrder = 13
- Text = 'Copying...'
- end
- object FinishCaption: TEdit
- Left = 72
- Top = 164
- Width = 170
- Height = 21
- TabOrder = 14
- Text = 'Setup Complete'
- end
- object GroupCaption: TEdit
- Left = 72
- Top = 116
- Width = 170
- Height = 21
- TabOrder = 12
- Text = 'Select program folder'
- end
- object Memo10: TMemo
- Left = 3
- Top = 260
- Width = 413
- Height = 22
- TabOrder = 27
- WordWrap = False
- end
- object ErrorFile: TEdit
- Left = 251
- Top = 20
- Width = 165
- Height = 21
- TabOrder = 17
- Text = 'File Copy Error: %s'
- end
- object ErrorShortcut: TEdit
- Left = 251
- Top = 44
- Width = 165
- Height = 21
- TabOrder = 18
- Text = 'Shortcut creating error: %s'
- end
- object ErrorMissing: TEdit
- Left = 251
- Top = 68
- Width = 165
- Height = 21
- TabOrder = 19
- Text = 'Source file missing: %s'
- end
- object ErrorAbortQuestion: TEdit
- Left = 251
- Top = 92
- Width = 165
- Height = 21
- TabOrder = 20
- Text = 'Abort Setup ?'
- end
- object ErrorNotCompleted: TEdit
- Left = 251
- Top = 116
- Width = 165
- Height = 21
- TabOrder = 21
- Text = 'Setup not completed'
- end
- object ErrorAborted: TEdit
- Left = 251
- Top = 140
- Width = 165
- Height = 21
- TabOrder = 22
- Text = 'Setup aborted'
- end
- object ErrorDiskSpace: TEdit
- Left = 251
- Top = 164
- Width = 165
- Height = 21
- TabOrder = 23
- Text = 'Disk space required: %d kb. Please choose another disk'
- end
- object NameRegister: TEdit
- Left = 4
- Top = 188
- Width = 53
- Height = 21
- TabOrder = 7
- Text = 'Register'
- end
- object URL: TEdit
- Left = 72
- Top = 188
- Width = 170
- Height = 21
- Hint = 'Clear this field if you don'#39't want to register'
- TabOrder = 15
- Text = 'http://www.mdart.com'
- end
- object ErrorInternetBrowser: TEdit
- Left = 251
- Top = 188
- Width = 165
- Height = 21
- TabOrder = 24
- Text = 'Error opening Internet browser'
- end
- object ErrorKeyword: TEdit
- Left = 251
- Top = 212
- Width = 165
- Height = 21
- TabOrder = 25
- Text = 'Wrong keyword'
- end
- object CaptionUninstall: TEdit
- Left = 251
- Top = 236
- Width = 165
- Height = 21
- TabOrder = 26
- Text = 'Uninstall'
- end
- object WelcomeCaption: TEdit
- Left = 72
- Top = 20
- Width = 170
- Height = 21
- TabOrder = 8
- Text = 'Welcome!'
- end
- object CustomCaption: TEdit
- Left = 72
- Top = 212
- Width = 170
- Height = 21
- TabOrder = 16
- Text = 'Custom setup'
- end
- end
- object Files: TTabSheet
- Caption = 'Files and icons'
- object Label8: TLabel
- Left = 4
- Top = 8
- Width = 72
- Height = 13
- Caption = 'File list to copy:'
- end
- object Label9: TLabel
- Left = 4
- Top = 156
- Width = 63
- Height = 13
- Caption = 'Group Name:'
- end
- object Label10: TLabel
- Left = 4
- Top = 177
- Width = 44
- Height = 13
- Caption = 'Icons list:'
- end
- object GroupName: TEdit
- Left = 128
- Top = 152
- Width = 289
- Height = 21
- TabOrder = 1
- Text = '%ProductName%'
- end
- object ListFiles: TMemo
- Left = 4
- Top = 24
- Width = 409
- Height = 117
- TabOrder = 0
- WordWrap = False
- end
- object ListIcons: TMemo
- Left = 4
- Top = 196
- Width = 413
- Height = 81
- TabOrder = 2
- WordWrap = False
- end
- end
- object Registry: TTabSheet
- Caption = 'Registry'
- object Label20: TLabel
- Left = 2
- Top = 1
- Width = 329
- Height = 13
- Caption = '[HKEY_CURRENT_USER\Software\%FirmName%\%InternalName%]'
- end
- object Label21: TLabel
- Left = 2
- Top = 16
- Width = 102
- Height = 13
- Caption = '"Version"=%Version%'
- end
- object Label22: TLabel
- Left = 2
- Top = 32
- Width = 113
- Height = 13
- Caption = '"CDPath"=%CDPATH%'
- end
- object Label23: TLabel
- Left = 2
- Top = 48
- Width = 115
- Height = 13
- Caption = '"HDPath"=%HDPATH%'
- end
- object RegList: TMemo
- Left = 1
- Top = 64
- Width = 417
- Height = 217
- ScrollBars = ssVertical
- TabOrder = 0
- WordWrap = False
- end
- object Import: TButton
- Left = 336
- Top = 34
- Width = 81
- Height = 25
- Caption = 'Import *.reg'
- TabOrder = 1
- OnClick = ImportClick
- end
- end
- object WelcomeDialog: TTabSheet
- Caption = 'Welcome'
- object Image1: TImage
- Left = 8
- Top = 4
- Width = 120
- Height = 260
- end
- object Memo1: TMemo
- Left = 140
- Top = 4
- Width = 277
- Height = 260
- Color = clBtnFace
- Lines.Strings = (
- 'Welcome to the %ProductName% Setup program. This '
- 'program will install %ProductName% on your computer.'
- ''
- 'It is strongly recommended that you close all Windows '
- 'programs before running this Setup program.'
- ''
- 'Click Cancel to quit Setup and then close all programs '
- 'you have running. Click Next to continue with Setup '
- 'program.'
- ''
- 'WARNING: This program is protected by copyright law '
- 'and international treaties.'
- ''
- 'Unauthorized reproduction or distribution of this '
- 'program, '
- 'or any portion of it, may result in severe civil and '
- 'criminal '
- 'penalties, and will be procecuted to the maximum '
- 'extent '
- 'possible under law.')
- TabOrder = 0
- end
- end
- object LicenseDialog: TTabSheet
- Caption = 'License'
- object Image2: TImage
- Left = 12
- Top = 8
- Width = 32
- Height = 32
- AutoSize = True
- end
- object Memo2: TMemo
- Left = 60
- Top = 8
- Width = 349
- Height = 33
- Color = clBtnFace
- Lines.Strings = (
- 'Please read the following Licence Agreement. Press the PageDown '
- 'key '
- 'to see the rest of the agreement.')
- TabOrder = 0
- end
- object Memo4: TMemo
- Left = 12
- Top = 236
- Width = 397
- Height = 41
- Color = clBtnFace
- Lines.Strings = (
-
- 'Do you accept all the terms of the preceding License Agreement? ' +
- 'If you choose '
-
- 'No, Setup will Close. To install %ProductName%, you must accept ' +
- 'this '
- 'agreement.')
- TabOrder = 2
- end
- object License: TMemo
- Left = 12
- Top = 44
- Width = 397
- Height = 189
- ScrollBars = ssVertical
- TabOrder = 1
- end
- end
- object UserDialog: TTabSheet
- Caption = 'User information'
- object Image3: TImage
- Left = 8
- Top = 4
- Width = 120
- Height = 260
- AutoSize = True
- end
- object Memo5: TMemo
- Left = 140
- Top = 4
- Width = 269
- Height = 61
- Color = clBtnFace
- Lines.Strings = (
- 'Please type your name (required) and name of the '
- 'company you work for (optional).')
- TabOrder = 0
- end
- object UserNameLabel: TEdit
- Left = 140
- Top = 88
- Width = 121
- Height = 21
- Color = clBtnFace
- TabOrder = 1
- Text = 'Your name:'
- end
- object SerialNumberLabel: TEdit
- Left = 140
- Top = 152
- Width = 121
- Height = 21
- Color = clBtnFace
- TabOrder = 2
- Text = 'Keyword:'
- end
- object Memo6: TMemo
- Left = 140
- Top = 188
- Width = 269
- Height = 77
- Color = clBtnFace
- Lines.Strings = (
- 'Please enter a keyword from page %s, line %s, word '
- '%s '
- 'of your user'#39's manual')
- TabOrder = 6
- end
- object OrganizationLabel: TEdit
- Left = 140
- Top = 120
- Width = 121
- Height = 21
- Color = clBtnFace
- TabOrder = 3
- Text = 'Organization:'
- end
- object KeywordNeeded: TCheckBox
- Left = 264
- Top = 160
- Width = 121
- Height = 17
- Caption = 'Required'
- TabOrder = 5
- OnClick = KeywordNeededClick
- end
- object Protection: TMemo
- Left = 264
- Top = 68
- Width = 145
- Height = 89
- Hint = '#Page,#Line,#Word,Keyword'
- TabOrder = 4
- end
- object SetupDat: TCheckBox
- Left = 140
- Top = 268
- Width = 97
- Height = 17
- Caption = 'SetupDat'
- TabOrder = 7
- end
- end
- object CustomDialog: TTabSheet
- Caption = 'Custom'
- object Image8: TImage
- Left = 8
- Top = 4
- Width = 120
- Height = 260
- AutoSize = True
- end
- object Label14: TLabel
- Left = 145
- Top = 179
- Width = 180
- Height = 13
- Caption = 'Radio Buttons (if flag text is not empty)'
- end
- object CustomMemo: TMemo
- Left = 140
- Top = 4
- Width = 277
- Height = 61
- Color = clBtnFace
- Lines.Strings = (
- 'Please select components you wish to install')
- TabOrder = 0
- end
- object FlagText1: TEdit
- Left = 144
- Top = 195
- Width = 201
- Height = 21
- TabOrder = 1
- Text = 'FlagText1'
- end
- object FlagText2: TEdit
- Left = 144
- Top = 219
- Width = 201
- Height = 21
- TabOrder = 2
- Text = 'FlagText2'
- end
- object FlagText3: TEdit
- Left = 144
- Top = 243
- Width = 201
- Height = 21
- TabOrder = 3
- Text = 'FlagText3'
- end
- object Flag1: TEdit
- Left = 349
- Top = 195
- Width = 67
- Height = 21
- TabOrder = 4
- Text = 'Flag1'
- end
- object Flag2: TEdit
- Left = 349
- Top = 219
- Width = 67
- Height = 21
- TabOrder = 5
- Text = 'Flag2'
- end
- object Flag3: TEdit
- Left = 349
- Top = 243
- Width = 67
- Height = 21
- TabOrder = 6
- Text = 'Flag3'
- end
- end
- object ChooseDir: TTabSheet
- Caption = 'Destination'
- object Image4: TImage
- Left = 8
- Top = 4
- Width = 120
- Height = 260
- AutoSize = True
- end
- object Bevel2: TBevel
- Left = 140
- Top = 192
- Width = 273
- Height = 71
- end
- object Memo7: TMemo
- Left = 140
- Top = 4
- Width = 269
- Height = 161
- Color = clBtnFace
- Lines.Strings = (
- 'Setup will install %ProductName% in the following '
- 'directory.'
- ''
- 'To install to this directory, click Next.'
- ''
- 'To install to a different directory, click Browse and '
- 'select another directory.'
- ''
- 'You can choose not to install %ProductName%, by '
- 'clicking Cancel to exit Setup.')
- TabOrder = 0
- end
- object InstallDirLabel: TEdit
- Left = 152
- Top = 184
- Width = 133
- Height = 21
- Color = clBtnFace
- TabOrder = 1
- Text = 'Destination Directory'
- end
- object DefaultDir: TEdit
- Left = 152
- Top = 208
- Width = 253
- Height = 21
- Color = clBtnFace
- TabOrder = 2
- Text = '%ProgramFiles%\%ProductName%'
- end
- object Button1: TButton
- Left = 330
- Top = 234
- Width = 75
- Height = 25
- Caption = 'Browse'
- TabOrder = 3
- end
- end
- object SelectFolder: TTabSheet
- Caption = 'Folder'
- object Image7: TImage
- Left = 8
- Top = 4
- Width = 120
- Height = 260
- AutoSize = True
- end
- object Memo9: TMemo
- Left = 136
- Top = 4
- Width = 277
- Height = 93
- Lines.Strings = (
- 'Setup will add program icons to the Program folder '
- 'listed '
- 'below. You may type a new folder name, or select one '
- 'from the existing Folders list. Click Next to continue.')
- TabOrder = 0
- end
- end
- object CopyingDialog: TTabSheet
- Caption = 'Process'
- object Image5: TImage
- Left = 8
- Top = 4
- Width = 120
- Height = 260
- AutoSize = True
- end
- object Process1: TEdit
- Left = 156
- Top = 120
- Width = 257
- Height = 21
- TabOrder = 1
- Text = 'Copying files'
- end
- object Process2: TEdit
- Left = 156
- Top = 148
- Width = 257
- Height = 21
- TabOrder = 2
- Text = 'Creating program group'
- end
- object Process3: TEdit
- Left = 156
- Top = 176
- Width = 257
- Height = 21
- TabOrder = 3
- Text = 'Creating icons'
- end
- object Process4: TEdit
- Left = 156
- Top = 204
- Width = 257
- Height = 21
- TabOrder = 4
- Text = 'Updating system information'
- end
- object Memo3: TMemo
- Left = 136
- Top = 4
- Width = 277
- Height = 93
- Lines.Strings = (
- 'Please wait while Setup copying files. If you click '
- 'Cancel, '
- 'install will canceled immediatly.')
- TabOrder = 0
- end
- end
- object ExitDialog: TTabSheet
- Caption = 'Exit'
- object Image6: TImage
- Left = 8
- Top = 4
- Width = 120
- Height = 260
- AutoSize = True
- end
- object Memo8: TMemo
- Left = 136
- Top = 4
- Width = 277
- Height = 261
- Lines.Strings = (
- 'Setup has finished copying files to your computer. '
- ''
- 'If you have access to Internet, please register your '
- 'software for updates and new product notification.'
- ''
- 'Click '#39'Register'#39' to begin registration.'
- ''
- 'Click '#39'Finish'#39' to exit without registration.')
- TabOrder = 0
- end
- object Restart: TCheckBox
- Left = 136
- Top = 293
- Width = 97
- Height = 17
- Caption = 'Restart required'
- TabOrder = 2
- end
- object RestartText: TEdit
- Left = 137
- Top = 270
- Width = 276
- Height = 21
- TabOrder = 1
- Text = 'Restart now'
- end
- end
- end
- object ExitBtn: TButton
- Left = 352
- Top = 339
- Width = 75
- Height = 25
- Caption = 'Exit'
- ModalResult = 2
- TabOrder = 3
- OnClick = ExitBtnClick
- end
- object LoadBtn: TBitBtn
- Left = 0
- Top = 340
- Width = 121
- Height = 25
- Caption = 'Load setup.inf'
- TabOrder = 1
- OnClick = LoadBtnClick
- end
- object SaveBtn: TBitBtn
- Left = 128
- Top = 340
- Width = 109
- Height = 25
- Caption = 'Save setup.inf'
- TabOrder = 2
- OnClick = SaveBtnClick
- end
- object OpenDialog: TOpenDialog
- DefaultExt = 'inf'
- FileName = 'setup.inf'
- Filter = 'Setup inf|setup*.inf|All files|*.*'
- Options = []
- Title = 'Open .inf from'
- Left = 48
- Top = 304
- end
- object ColorDialog: TColorDialog
- Ctl3D = True
- Options = [cdFullOpen, cdAnyColor]
- Left = 80
- Top = 304
- end
- object OpenReg: TOpenDialog
- DefaultExt = '*.reg'
- Filter = '*.reg|*.reg'
- Options = [ofHideReadOnly, ofNoChangeDir, ofFileMustExist]
- Title = 'Registry file import'
- Left = 16
- Top = 304
- end
- object SaveDialog: TSaveDialog
- DefaultExt = 'inf'
- FileName = 'setup.inf'
- Filter = 'Setup inf file|Setup*.inf'
- Options = []
- Title = 'Save setup.inf to'
- Left = 112
- Top = 304
- end
- end
-